palindrome word using sub procedure